home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #2 / Monster Media No. 2 (Monster Media)(1994).ISO / finance / cs4_b.zip / PAYMENT3.STY < prev    next >
Text File  |  1994-05-15  |  2KB  |  72 lines

  1. > @VN03 := {0.05}        ; Increment interest
  2. @UA" Enter Loan Amount "
  3. > @VN01 := {@UA}         ; Principal
  4. @UA" Enter Annual Interest Rate "
  5. > @VN02 := {@UA}         ; Annual Interest rate
  6. @UN" Enter Number of Years"
  7. > @VN10 := {@UN}         ; Number of years
  8. @MA5 @MD00
  9.  
  10. @IF @RD = "SCREEN" THEN
  11. @MK12 @MV12 @MH3
  12. ───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬──────────
  13. > @VN07 := {@VN10}
  14.  Interest  │
  15. @LA9
  16. @VN07  Years│
  17. > @VN07 := {@VN07+1}
  18. @EA
  19.  Interest
  20. ───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼──────────
  21.  
  22. @MA5 @MD02
  23.  
  24. > @VN04 := {@VN02}
  25.  
  26. @LA50
  27. > @VN07 := {@VN10*12}
  28.    @VN04 %  │@MA11
  29. @LB9
  30. > @VN05 := [@CM(@VN01,@VN04,@VN07,12)]
  31. @VN05------ │
  32. > @VN07 := {@VN07+12}
  33. @EB
  34. @MA5    @VN04 %
  35. > @VN04 := {@VN04+@VN03}
  36. 
  37. @EA
  38. ───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴──────────
  39. @EL
  40. @PA @PD ;
  41. @MI{@RI} ==================================================================================================================================
  42. > @VN07 := {@VN10}
  43. @MI{@RI}  Interest   ;
  44. @LA9
  45. @VN07  Years ;
  46. > @VN07 := {@VN07+1}
  47. @EA
  48.  Interest
  49. @MI{@RI} ==================================================================================================================================
  50.  
  51. @MA5 @MD02
  52.  
  53. > @VN04 := {@VN02}
  54.  
  55. @LA50
  56. > @VN07 := {@VN10*12}
  57. @MI{@RI}    @VN04 %   @MA11
  58. @LB9
  59. > @VN05 := [@CM(@VN01,@VN04,@VN07,12)]
  60. @VN05------  ;
  61. > @VN07 := {@VN07+12}
  62. @EB
  63. @MA5    @VN04 %
  64. > @VN04 := {@VN04+@VN03}
  65. 
  66. @EA
  67. @MI{@RI} ==================================================================================================================================
  68. @EI
  69. @MI{@RI} @HN------------------------------------------------------------ 
  70. @MI{@RI} Amount of loan $ @MA11 @MD02 @VN01------ 
  71. 
  72.